From b78aeab8b81e73adab125856f9f75cce342f3fa5 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 8 Dec 2000 16:35:04 +0000 Subject: [PATCH] (texinfo-chapter-level-regexp) (texinfo-filter): Removed (moved to texinfo.el). --- lisp/textmodes/texnfo-upd.el | 9 --------- 1 file changed, 9 deletions(-) diff --git a/lisp/textmodes/texnfo-upd.el b/lisp/textmodes/texnfo-upd.el index 0c59eadfcc7..f964e411aa6 100644 --- a/lisp/textmodes/texnfo-upd.el +++ b/lisp/textmodes/texnfo-upd.el @@ -1122,15 +1122,6 @@ end of that region; it limits the search." "^@\\(chapter \\|sect\\|subs\\|subh\\|unnum\\|major\\|chapheading \\|heading \\|appendix\\)" "Regexp matching chapter, section, other headings (but not the top node).") -(defun texinfo-filter (section list) - (let (res) - (dolist (x list) (if (eq section (cadr x)) (push (car x) res))) - res)) - -(defvar texinfo-chapter-level-regexp - (regexp-opt (texinfo-filter 2 texinfo-section-list)) - "Regular expression matching just the Texinfo chapter level headings.") - (defvar texinfo-section-level-regexp (regexp-opt (texinfo-filter 3 texinfo-section-list)) "Regular expression matching just the Texinfo section level headings.") -- 2.30.2